;Seg 1 = DATA ID# -4001 proc 1 of 46 (local)

0000: L0000	ORI.B	#$01,D0
0004: L0004	ORI.B	#$3C,D0	;'<'
0008: 	ORI.B	#$F0,D1
000C: 	JSR	locProc2
0010: 	MOVEA.L	A5,A0
0012: 	ADDA.W	#$0020,A0
0016: 	LEA	L0004,A1
001A: 	MOVE.L	(A1)+,(A0)+
001C: 	MOVE.L	(A1),(A0)
001E: 	MOVEA.L	A5,A0
0020: 	ADDA.W	#$0022,A0
0024: 	JMP	(A0)
0026: 	.WORD	$4E75,$4EBA,$8F4,$4EBA	;[NuN...N.]
002E: 	.WORD	$BF6,$4EBA,$DD8,$4EBA	;[..N...N.]
0036: 	.WORD	$11D0,$4EBA,$1B36	;[..N..6..]

;Seg 1 = DATA ID# -4001 proc 2 of 46 (local)

0000: L003C	LINK	A6,#$FFFC
0004: 	MOVEM.L	D2-D6/A2-A4,-(A7)
0008: 	JSR	locProc9
000C: 	MOVE.W	D0,$FFFE(A6)
0010: 	LEA	L091E,A2
0014: 	LEA	L0C22,A3
0018: 	LEA	L0C24,A4
001C: 	MOVE.L	A4,D2
001E: 	LEA	L0E04,A4
0022: 	MOVE.L	A4,D3
0024: 	LEA	L0E0A,A4
0028: 	MOVE.L	A4,D4
002A: 	LEA	L1206,A4
002E: 	MOVE.L	A4,D5
0030: 	LEA	L1B70,A4
0034: 	MOVE.L	A4,D6
0036: 	JSR	locProc8
003A: 	TST.L	D0
003C: 	BNE.S	L00CA
003E: 	MOVE.L	D3,-(A7)
0040: 	MOVE.L	D2,-(A7)
0042: 	MOVE.L	A3,-(A7)
0044: 	MOVE.L	A2,-(A7)
0046: 	MOVE.L	D6,-(A7)
0048: 	MOVE.L	D5,-(A7)
004A: 	MOVE.L	D4,-(A7)
004C: 	JSR	locProc3
0050: 	MOVE.L	D6,-(A7)
0052: 	MOVE.L	D5,-(A7)
0054: 	MOVE.L	D4,-(A7)
0056: 	JSR	locProc4
005A: 	MOVE.L	D3,-(A7)
005C: 	MOVE.L	D2,-(A7)
005E: 	MOVE.L	A3,-(A7)
0060: 	MOVE.L	A2,-(A7)
0062: 	JSR	locProc5
0066: 	MOVE.L	D3,-(A7)
0068: 	MOVE.L	D2,-(A7)
006A: 	MOVE.L	A3,-(A7)
006C: 	MOVE.L	A2,-(A7)
006E: 	JSR	locProc6
0072: 	MOVE.L	D6,-(A7)
0074: 	MOVE.L	D5,-(A7)
0076: 	MOVE.L	D4,-(A7)
0078: 	JSR	locProc7
007C: 	MOVE.W	$FFFE(A6),D0
0080: 	EXT.L	D0
0082: 	MOVE.L	D0,-(A7)
0084: 	CLR.L	-(A7)
0086: 	JSR	locProc26
008A: 	LEA	$005C(A7),A7
008E: L00CA	MOVEM.L	$FFDC(A6),D2-D6/A2-A4
0094: 	UNLK	A6
0096: 	RTS	

;Seg 1 = DATA ID# -4001 proc 3 of 46 (local)

0000: L00D4	LINK	A6,#$FFEC
0004: 	MOVEM.L	D2-D6,-(A7)
0008: 	MOVE.L	$0008(A6),D3
000C: 	MOVE.L	$000C(A6),D4
0010: 	MOVE.L	$0010(A6),D5
0014: 	SUBQ.L	#2,A7
0016: 	_CurResFile	
0018: 	MOVE.W	(A7)+,D0
001A: 	MOVE.W	D0,D6
001C: 	CLR.W	-(A7)
001E: 	_UseResFile	
0020: 	CLR.L	-(A7)
0022: 	MOVE.L	$0018(A6),-(A7)
0026: 	MOVE.L	$0014(A6),-(A7)
002A: 	JSR	locProc10
002E: 	CLR.L	-(A7)
0030: 	MOVE.L	$0020(A6),-(A7)
0034: 	MOVE.L	$001C(A6),-(A7)
0038: 	JSR	locProc11
003C: 	CLR.L	-(A7)
003E: 	MOVE.L	D5,-(A7)
0040: 	MOVE.L	D4,-(A7)
0042: 	MOVE.L	D3,-(A7)
0044: 	JSR	locProc12
0048: 	CLR.W	-(A7)
004A: 	_UpdateResFile	
004C: 	MOVE.W	D6,-(A7)
004E: 	_UseResFile	
0050: 	LEA	$0028(A7),A7
0054: 	MOVEM.L	$FFD8(A6),D2-D6
005A: 	UNLK	A6
005C: 	RTS	

;Seg 1 = DATA ID# -4001 proc 4 of 46 (local)

0000: L0132	LINK	A6,#$FFD8
0004: 	MOVEM.L	D2-D6,-(A7)
0008: 	MOVE.L	$0008(A6),D3
000C: 	MOVE.L	$000C(A6),D4
0010: 	MOVE.L	$0010(A6),D5
0014: 	JSR	locProc9
0018: 	MOVE.W	D0,$FFFE(A6)
001C: 	SUBQ.L	#2,A7
001E: 	_CurResFile	
0020: 	MOVE.W	(A7)+,D0
0022: 	MOVE.W	D0,$FFFC(A6)
0026: 	MOVE.L	#$53636F72,$FFE8(A6)	;'Scor'
002E: 	MOVE.L	#$65730000,$FFEC(A6)
0036: 	MOVE.W	$FFFE(A6),D0
003A: 	EXT.L	D0
003C: 	MOVE.L	D0,-(A7)
003E: 	CLR.L	-(A7)
0040: 	JSR	locProc25
0044: 	PEA	$FFE8(A6)
0048: 	JSR	locProc43
004C: 	MOVE.W	D0,D6
004E: 	LEA	$000C(A7),A7
0052: 	BGE.S	L019A
0054: 	PEA	$FFE8(A6)
0058: 	JSR	locProc42
005C: 	PEA	$FFE8(A6)
0060: 	JSR	locProc43
0064: 	MOVE.W	D0,D6
0066: 	ADDQ.L	#8,A7
0068: L019A	TST.W	D6
006A: 	BLE.S	L01FC
006C: 	MOVE.W	D6,-(A7)
006E: 	_UseResFile	
0070: 	MOVE.W	D6,D0
0072: 	EXT.L	D0
0074: 	MOVE.L	D0,-(A7)
0076: 	MOVE.L	D5,-(A7)
0078: 	MOVE.L	D4,-(A7)
007A: 	MOVE.L	D3,-(A7)
007C: 	JSR	locProc12
0080: 	MOVE.W	D6,-(A7)
0082: 	_UpdateResFile	
0084: 	MOVE.W	D6,-(A7)
0086: 	_CloseResFile	
0088: 	PEA	$FFD8(A6)
008C: 	MOVE.W	$FFFE(A6),D0
0090: 	EXT.L	D0
0092: 	MOVE.L	D0,-(A7)
0094: 	PEA	$FFE8(A6)
0098: 	JSR	locProc28
009C: 	MOVE.L	#$52444556,$FFD8(A6)	;'RDEV'
00A4: 	MOVE.L	#$5A535953,$FFDC(A6)	;'ZSYS'
00AC: 	ORI.W	#$4000,$FFE0(A6)
00B2: 	PEA	$FFD8(A6)
00B6: 	MOVE.W	$FFFE(A6),D0
00BA: 	EXT.L	D0
00BC: 	MOVE.L	D0,-(A7)
00BE: 	PEA	$FFE8(A6)
00C2: 	JSR	locProc29
00C6: 	LEA	$0028(A7),A7
00CA: L01FC	MOVE.W	$FFFC(A6),-(A7)
00CE: 	_UseResFile	
00D0: 	MOVEM.L	$FFC4(A6),D2-D6
00D6: 	UNLK	A6
00D8: 	RTS	

;Seg 1 = DATA ID# -4001 proc 5 of 46 (local)

0000: L020C	LINK	A6,#$FFD8
0004: 	MOVEM.L	D2-D6,-(A7)
0008: 	MOVE.L	$0008(A6),D3
000C: 	MOVE.L	$000C(A6),D4
0010: 	MOVE.L	$0010(A6),D0
0014: 	JSR	locProc9
0018: 	MOVE.W	D0,D6
001A: 	SUBQ.L	#2,A7
001C: 	_CurResFile	
001E: 	MOVE.W	(A7)+,D0
0020: 	MOVE.W	D0,$FFFE(A6)
0024: 	MOVE.L	#$4E6F7465,$FFEA(A6)	;'Note'
002C: 	MOVE.L	#$20506164,$FFEE(A6)	;' Pad'
0034: 	MOVE.L	#$2046696C,$FFF2(A6)	;' Fil'
003C: 	MOVE.L	#$65000000,$FFF6(A6)
0044: 	MOVE.W	D6,D0
0046: 	EXT.L	D0
0048: 	MOVE.L	D0,-(A7)
004A: 	CLR.L	-(A7)
004C: 	JSR	locProc25
0050: 	PEA	$FFEA(A6)
0054: 	JSR	locProc43
0058: 	MOVE.W	D0,D5
005A: 	LEA	$000C(A7),A7
005E: 	BGE.S	L0280
0060: 	PEA	$FFEA(A6)
0064: 	JSR	locProc42
0068: 	PEA	$FFEA(A6)
006C: 	JSR	locProc43
0070: 	MOVE.W	D0,D5
0072: 	ADDQ.L	#8,A7
0074: L0280	TST.W	D5
0076: 	BLE.S	L02D6
0078: 	MOVE.W	D5,-(A7)
007A: 	_UseResFile	
007C: 	MOVE.W	D5,D0
007E: 	EXT.L	D0
0080: 	MOVE.L	D0,-(A7)
0082: 	MOVE.L	D4,-(A7)
0084: 	MOVE.L	D3,-(A7)
0086: 	JSR	locProc10
008A: 	MOVE.W	D5,-(A7)
008C: 	_UpdateResFile	
008E: 	MOVE.W	D5,-(A7)
0090: 	_CloseResFile	
0092: 	PEA	$FFDA(A6)
0096: 	MOVE.W	D6,D0
0098: 	EXT.L	D0
009A: 	MOVE.L	D0,-(A7)
009C: 	PEA	$FFEA(A6)
00A0: 	JSR	locProc28
00A4: 	MOVE.L	#$494E4954,$FFDA(A6)	;'INIT'
00AC: 	MOVE.L	#$5A535953,$FFDE(A6)	;'ZSYS'
00B4: 	PEA	$FFDA(A6)
00B8: 	MOVE.W	D6,D0
00BA: 	EXT.L	D0
00BC: 	MOVE.L	D0,-(A7)
00BE: 	PEA	$FFEA(A6)
00C2: 	JSR	locProc29
00C6: 	LEA	$0024(A7),A7
00CA: L02D6	MOVE.W	$FFFE(A6),-(A7)
00CE: 	_UseResFile	
00D0: 	MOVEM.L	$FFC4(A6),D2-D6
00D6: 	UNLK	A6
00D8: 	RTS	

;Seg 1 = DATA ID# -4001 proc 6 of 46 (local)

0000: L02E6	LINK	A6,#$FFD8
0004: 	MOVEM.L	D2-D6,-(A7)
0008: 	MOVE.L	$0008(A6),D3
000C: 	MOVE.L	$000C(A6),D4
0010: 	MOVE.L	$0010(A6),D5
0014: 	JSR	locProc9
0018: 	MOVE.W	D0,$FFFE(A6)
001C: 	SUBQ.L	#2,A7
001E: 	_CurResFile	
0020: 	MOVE.W	(A7)+,D0
0022: 	MOVE.W	D0,$FFFC(A6)
0026: 	MOVE.L	#$53637261,$FFE8(A6)	;'Scra'
002E: 	MOVE.L	#$70626F6F,$FFEC(A6)	;'pboo'
0036: 	MOVE.L	#$6B204669,$FFF0(A6)	;'k Fi'
003E: 	MOVE.L	#$6C650000,$FFF4(A6)
0046: 	MOVE.W	$FFFE(A6),D0
004A: 	EXT.L	D0
004C: 	MOVE.L	D0,-(A7)
004E: 	CLR.L	-(A7)
0050: 	JSR	locProc25
0054: 	PEA	$FFE8(A6)
0058: 	JSR	locProc43
005C: 	MOVE.W	D0,D6
005E: 	LEA	$000C(A7),A7
0062: 	BGE.S	L035E
0064: 	PEA	$FFE8(A6)
0068: 	JSR	locProc42
006C: 	PEA	$FFE8(A6)
0070: 	JSR	locProc43
0074: 	MOVE.W	D0,D6
0076: 	ADDQ.L	#8,A7
0078: L035E	TST.W	D6
007A: 	BLE.S	L03C8
007C: 	MOVE.W	D6,-(A7)
007E: 	_UseResFile	
0080: 	MOVE.W	D6,D0
0082: 	EXT.L	D0
0084: 	MOVE.L	D0,-(A7)
0086: 	MOVE.L	D4,-(A7)
0088: 	MOVE.L	D3,-(A7)
008A: 	JSR	locProc10
008E: 	MOVE.W	D6,D0
0090: 	EXT.L	D0
0092: 	MOVE.L	D0,-(A7)
0094: 	MOVE.L	$0014(A6),-(A7)
0098: 	MOVE.L	D5,-(A7)
009A: 	JSR	locProc11
009E: 	MOVE.W	D6,-(A7)
00A0: 	_UpdateResFile	
00A2: 	MOVE.W	D6,-(A7)
00A4: 	_CloseResFile	
00A6: 	PEA	$FFD8(A6)
00AA: 	MOVE.W	$FFFE(A6),D0
00AE: 	EXT.L	D0
00B0: 	MOVE.L	D0,-(A7)
00B2: 	PEA	$FFE8(A6)
00B6: 	JSR	locProc28
00BA: 	MOVE.L	#$52444556,$FFD8(A6)	;'RDEV'
00C2: 	MOVE.L	#$5A535953,$FFDC(A6)	;'ZSYS'
00CA: 	PEA	$FFD8(A6)
00CE: 	MOVE.W	$FFFE(A6),D0
00D2: 	EXT.L	D0
00D4: 	MOVE.L	D0,-(A7)
00D6: 	PEA	$FFE8(A6)
00DA: 	JSR	locProc29
00DE: 	LEA	$0030(A7),A7
00E2: L03C8	MOVE.W	$FFFC(A6),-(A7)
00E6: 	_UseResFile	
00E8: 	MOVEM.L	$FFC4(A6),D2-D6
00EE: 	UNLK	A6
00F0: 	RTS	

;Seg 1 = DATA ID# -4001 proc 7 of 46 (local)

0000: L03D8	LINK	A6,#$FFD8
0004: 	MOVEM.L	D2-D6,-(A7)
0008: 	MOVE.L	$0008(A6),D3
000C: 	MOVE.L	$000C(A6),D4
0010: 	MOVE.L	$0010(A6),D5
0014: 	JSR	locProc9
0018: 	MOVE.W	D0,$FFFE(A6)
001C: 	SUBQ.L	#2,A7
001E: 	_CurResFile	
0020: 	MOVE.W	(A7)+,D0
0022: 	MOVE.W	D0,$FFFC(A6)
0026: 	MOVE.L	#$4465736B,$FFE8(A6)	;'Desk'
002E: 	MOVE.L	#$746F7020,$FFEC(A6)	;'top '
0036: 	CLR.L	$FFF0(A6)
003A: 	MOVE.W	$FFFE(A6),D0
003E: 	EXT.L	D0
0040: 	MOVE.L	D0,-(A7)
0042: 	CLR.L	-(A7)
0044: 	JSR	locProc25
0048: 	PEA	$FFE8(A6)
004C: 	JSR	locProc43
0050: 	MOVE.W	D0,D6
0052: 	LEA	$000C(A7),A7
0056: 	BGE.S	L0444
0058: 	PEA	$FFE8(A6)
005C: 	JSR	locProc42
0060: 	PEA	$FFE8(A6)
0064: 	JSR	locProc43
0068: 	MOVE.W	D0,D6
006A: 	ADDQ.L	#8,A7
006C: L0444	TST.W	D6
006E: 	BLE.S	L04A6
0070: 	MOVE.W	D6,-(A7)
0072: 	_UseResFile	
0074: 	MOVE.W	D6,D0
0076: 	EXT.L	D0
0078: 	MOVE.L	D0,-(A7)
007A: 	MOVE.L	D5,-(A7)
007C: 	MOVE.L	D4,-(A7)
007E: 	MOVE.L	D3,-(A7)
0080: 	JSR	locProc12
0084: 	MOVE.W	D6,-(A7)
0086: 	_UpdateResFile	
0088: 	MOVE.W	D6,-(A7)
008A: 	_CloseResFile	
008C: 	PEA	$FFD8(A6)
0090: 	MOVE.W	$FFFE(A6),D0
0094: 	EXT.L	D0
0096: 	MOVE.L	D0,-(A7)
0098: 	PEA	$FFE8(A6)
009C: 	JSR	locProc28
00A0: 	MOVE.L	#$494E4954,$FFD8(A6)	;'INIT'
00A8: 	MOVE.L	#$464E4452,$FFDC(A6)	;'FNDR'
00B0: 	ORI.W	#$4000,$FFE0(A6)
00B6: 	PEA	$FFD8(A6)
00BA: 	MOVE.W	$FFFE(A6),D0
00BE: 	EXT.L	D0
00C0: 	MOVE.L	D0,-(A7)
00C2: 	PEA	$FFE8(A6)
00C6: 	JSR	locProc29
00CA: 	LEA	$0028(A7),A7
00CE: L04A6	MOVE.W	$FFFC(A6),-(A7)
00D2: 	_UseResFile	
00D4: 	MOVEM.L	$FFC4(A6),D2-D6
00DA: 	UNLK	A6
00DC: 	RTS	

;Seg 1 = DATA ID# -4001 proc 8 of 46 (local)

0000: L04B6	MOVEA.L	$011C,A0
0004: 	LEA	$00B0(A0),A0
0008: 	TST.L	(A0)
000A: 	BNE.S	L04C6
000C: 	MOVEQ	$00,D0
000E: 	BRA.S	L04C8
0010: L04C6	MOVEQ	$01,D0
0012: L04C8	RTS	

;Seg 1 = DATA ID# -4001 proc 9 of 46 (local)

0000: L04CA	LINK	A6,#$FF50
0004: 	MOVE.L	D2,-(A7)
0006: 	CLR.W	D2
0008: 	LEA	$FF84(A6),A0
000C: 	MOVEQ	$00,D1
000E: 	BRA.S	L04DE
0010: L04DA	CLR.B	(A0)+
0012: 	ADDQ.L	#1,D1
0014: L04DE	MOVEQ	$7A,D0
0016: 	CMP.L	D1,D0
0018: 	BGT	L04DA
001C: 	PEA	$FFFE(A6)
0020: 	MOVE.W	$0A58,D0
0024: 	EXT.L	D0
0026: 	MOVE.L	D0,-(A7)
0028: 	JSR	locProc27
002C: 	MOVE.W	D0,D0
002E: 	ADDQ.L	#8,A7
0030: 	BNE.S	L0546
0032: 	CLR.L	$FF96(A6)
0036: 	MOVE.W	$FFFE(A6),$FF9A(A6)
003C: 	CLR.W	$FFA0(A6)
0040: 	CLR.L	-(A7)
0042: 	PEA	$FF84(A6)
0046: 	JSR	locProc34
004A: 	MOVE.W	D0,D0
004C: 	ADDQ.L	#8,A7
004E: 	BNE.S	L0546
0050: 	CLR.L	$FF62(A6)
0054: 	MOVE.W	$FFFE(A6),$FF66(A6)
005A: 	MOVE.L	$FFDE(A6),$FF80(A6)
0060: 	MOVE.L	#$4552494B,$FF6C(A6)	;'ERIK'
0068: 	CLR.L	-(A7)
006A: 	PEA	$FF50(A6)
006E: 	JSR	locProc31
0072: 	MOVE.W	D0,D0
0074: 	ADDQ.L	#8,A7
0076: 	BNE.S	L0546
0078: 	MOVE.W	$FF66(A6),D2
007C: L0546	MOVE.W	D2,D0
007E: 	EXT.L	D0
0080: 	MOVE.L	$FF4C(A6),D2
0084: 	UNLK	A6
0086: 	RTS	

;Seg 1 = DATA ID# -4001 proc 10 of 46 (local)

0000: L0552	LINK	A6,#$FFEC
0004: 	MOVEM.L	D2-D6/A2,-(A7)
0008: 	MOVE.L	$0008(A6),D4
000C: 	MOVE.L	$000C(A6),D0
0010: 	MOVE.W	$0012(A6),D3
0014: 	SUB.L	D4,D0
0016: 	MOVE.L	D0,D5
0018: 	SUBQ.L	#4,A7
001A: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0020: 	MOVE.W	#$0006,-(A7)
0024: 	_GetResource	
0026: 	MOVE.L	(A7)+,D0
0028: 	MOVEA.L	D0,A2
002A: 	MOVE.L	A2,D6
002C: 	BEQ	L05A0
0030: 	SUBQ.L	#2,A7
0032: 	MOVE.L	A2,-(A7)
0034: 	_HomeResFile	
0036: 	MOVE.W	(A7)+,D0
0038: 	CMP.W	D0,D3
003A: 	BNE	L05A0
003E: 	MOVE.L	A2,-(A7)
0040: 	_LoadResource	
0042: 	MOVE.L	D5,-(A7)
0044: 	MOVE.L	A2,-(A7)
0046: 	JSR	locProc37
004A: 	ADDQ.L	#8,A7
004C: 	BRA.S	L05E8
004E: L05A0	MOVE.L	D5,-(A7)
0050: 	JSR	locProc35
0054: 	MOVEA.L	D0,A2
0056: 	CLR.L	$FFEC(A6)
005A: 	PEA	$FFEC(A6)
005E: 	PEA	$0006
0062: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0068: 	MOVE.L	A2,-(A7)
006A: 	JSR	locProc44
006E: 	SUBQ.L	#2,A7
0070: 	_ResError	
0072: 	MOVE.W	(A7)+,D0
0074: 	EXT.L	D0
0076: 	MOVE.W	D0,D0
0078: 	LEA	$0014(A7),A7
007C: 	BEQ.S	L05E8
007E: 	PEA	$FFEC(A6)
0082: 	PEA	$0006
0086: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
008C: 	MOVE.L	A2,-(A7)
008E: 	JSR	locProc44
0092: 	LEA	$0010(A7),A7
0096: L05E8	MOVE.L	A2,-(A7)
0098: 	JSR	locProc39
009C: 	MOVE.L	D5,-(A7)
009E: 	MOVE.L	(A2),-(A7)
00A0: 	MOVE.L	D4,-(A7)
00A2: 	JSR	locProc41
00A6: 	MOVEA.L	(A2),A0
00A8: 	ADDQ.L	#2,A0
00AA: 	MOVE.L	$020C,(A0)
00AE: 	MOVE.L	A2,-(A7)
00B0: 	_ChangedResource	
00B2: 	MOVE.L	A2,-(A7)
00B4: 	_WriteResource	
00B6: 	MOVE.L	A2,-(A7)
00B8: 	JSR	locProc40
00BC: 	MOVE.L	A2,-(A7)
00BE: 	_ReleaseResource	
00C0: 	LEA	$0014(A7),A7
00C4: 	MOVEM.L	$FFD4(A6),D2-D6/A2
00CA: 	UNLK	A6
00CC: 	RTS	

;Seg 1 = DATA ID# -4001 proc 11 of 46 (local)

0000: L0620	LINK	A6,#$FFEC
0004: 	MOVEM.L	D2-D6/A2,-(A7)
0008: 	MOVE.L	$0008(A6),D4
000C: 	MOVE.L	$000C(A6),D0
0010: 	MOVE.W	$0012(A6),D3
0014: 	SUB.L	D4,D0
0016: 	MOVE.L	D0,D5
0018: 	SUBQ.L	#4,A7
001A: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0020: 	MOVE.W	#$0011,-(A7)
0024: 	_GetResource	
0026: 	MOVE.L	(A7)+,D0
0028: 	MOVEA.L	D0,A2
002A: 	MOVE.L	A2,D6
002C: 	BEQ	L066E
0030: 	SUBQ.L	#2,A7
0032: 	MOVE.L	A2,-(A7)
0034: 	_HomeResFile	
0036: 	MOVE.W	(A7)+,D0
0038: 	CMP.W	D0,D3
003A: 	BNE	L066E
003E: 	MOVE.L	A2,-(A7)
0040: 	_LoadResource	
0042: 	MOVE.L	D5,-(A7)
0044: 	MOVE.L	A2,-(A7)
0046: 	JSR	locProc37
004A: 	ADDQ.L	#8,A7
004C: 	BRA.S	L06B6
004E: L066E	MOVE.L	D5,-(A7)
0050: 	JSR	locProc35
0054: 	MOVEA.L	D0,A2
0056: 	CLR.L	$FFEC(A6)
005A: 	PEA	$FFEC(A6)
005E: 	PEA	$0011
0062: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0068: 	MOVE.L	A2,-(A7)
006A: 	JSR	locProc44
006E: 	SUBQ.L	#2,A7
0070: 	_ResError	
0072: 	MOVE.W	(A7)+,D0
0074: 	EXT.L	D0
0076: 	MOVE.W	D0,D0
0078: 	LEA	$0014(A7),A7
007C: 	BEQ.S	L06B6
007E: 	PEA	$FFEC(A6)
0082: 	PEA	$0011
0086: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
008C: 	MOVE.L	A2,-(A7)
008E: 	JSR	locProc44
0092: 	LEA	$0010(A7),A7
0096: L06B6	MOVE.L	A2,-(A7)
0098: 	JSR	locProc39
009C: 	MOVE.L	D5,-(A7)
009E: 	MOVE.L	(A2),-(A7)
00A0: 	MOVE.L	D4,-(A7)
00A2: 	JSR	locProc41
00A6: 	MOVEA.L	(A2),A0
00A8: 	ADDQ.L	#2,A0
00AA: 	MOVE.L	$020C,(A0)
00AE: 	MOVE.L	A2,-(A7)
00B0: 	_ChangedResource	
00B2: 	MOVE.L	A2,-(A7)
00B4: 	_WriteResource	
00B6: 	MOVE.L	A2,-(A7)
00B8: 	JSR	locProc40
00BC: 	MOVE.L	A2,-(A7)
00BE: 	_ReleaseResource	
00C0: 	LEA	$0014(A7),A7
00C4: 	MOVEM.L	$FFD4(A6),D2-D6/A2
00CA: 	UNLK	A6
00CC: 	RTS	

;Seg 1 = DATA ID# -4001 proc 12 of 46 (local)

0000: L06EE	LINK	A6,#$FFEC
0004: 	MOVEM.L	D2-D7/A2-A4,-(A7)
0008: 	MOVE.L	$0008(A6),D4
000C: 	MOVE.L	$000C(A6),D3
0010: 	MOVE.L	$0010(A6),D5
0014: 	MOVE.L	D3,D0
0016: 	SUB.L	D4,D0
0018: 	MOVE.L	D0,D6
001A: 	SUBQ.L	#4,A7
001C: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0022: 	MOVE.W	#$000A,-(A7)
0026: 	_GetResource	
0028: 	MOVE.L	(A7)+,D0
002A: 	MOVEA.L	D0,A2
002C: 	MOVE.L	A2,D7
002E: 	BEQ	L0740
0032: 	SUBQ.L	#2,A7
0034: 	MOVE.L	A2,-(A7)
0036: 	_HomeResFile	
0038: 	MOVE.W	(A7)+,D0
003A: 	CMP.W	$0016(A6),D0
003E: 	BNE	L0740
0042: 	MOVE.L	A2,-(A7)
0044: 	_LoadResource	
0046: 	MOVE.L	D6,-(A7)
0048: 	MOVE.L	A2,-(A7)
004A: 	JSR	locProc37
004E: 	ADDQ.L	#8,A7
0050: 	BRA.S	L0788
0052: L0740	MOVE.L	D6,-(A7)
0054: 	JSR	locProc35
0058: 	MOVEA.L	D0,A2
005A: 	CLR.L	$FFEC(A6)
005E: 	PEA	$FFEC(A6)
0062: 	PEA	$000A
0066: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
006C: 	MOVE.L	A2,-(A7)
006E: 	JSR	locProc44
0072: 	SUBQ.L	#2,A7
0074: 	_ResError	
0076: 	MOVE.W	(A7)+,D0
0078: 	EXT.L	D0
007A: 	MOVE.W	D0,D0
007C: 	LEA	$0014(A7),A7
0080: 	BEQ.S	L0788
0082: 	PEA	$FFEC(A6)
0086: 	PEA	$000A
008A: 	MOVE.L	#$494E4954,-(A7)	;'INIT'
0090: 	MOVE.L	A2,-(A7)
0092: 	JSR	locProc44
0096: 	LEA	$0010(A7),A7
009A: L0788	MOVE.L	A2,-(A7)
009C: 	JSR	locProc39
00A0: 	MOVE.L	D6,-(A7)
00A2: 	MOVE.L	(A2),-(A7)
00A4: 	MOVE.L	D4,-(A7)
00A6: 	JSR	locProc41
00AA: 	MOVEA.L	(A2),A0
00AC: 	ADDQ.L	#2,A0
00AE: 	MOVE.L	$020C,(A0)
00B2: 	MOVE.L	A2,-(A7)
00B4: 	_ChangedResource	
00B6: 	MOVE.L	A2,-(A7)
00B8: 	_WriteResource	
00BA: 	MOVE.L	A2,-(A7)
00BC: 	JSR	locProc40
00C0: 	MOVE.L	D5,D0
00C2: 	SUB.L	D3,D0
00C4: 	MOVE.L	D0,D6
00C6: 	SUBQ.L	#4,A7
00C8: 	MOVE.L	#$6174706C,-(A7)	;'atpl'
00CE: 	MOVE.W	#$0080,-(A7)
00D2: 	_GetResource	
00D4: 	MOVE.L	(A7)+,D0
00D6: 	MOVEA.L	D0,A2
00D8: 	MOVE.L	A2,D7
00DA: 	LEA	$0014(A7),A7
00DE: 	BEQ	L07F0
00E2: 	SUBQ.L	#2,A7
00E4: 	MOVE.L	A2,-(A7)
00E6: 	_HomeResFile	
00E8: 	MOVE.W	(A7)+,D0
00EA: 	CMP.W	$0016(A6),D0
00EE: 	BNE	L07F0
00F2: 	MOVE.L	A2,-(A7)
00F4: 	_LoadResource	
00F6: 	MOVE.L	D6,-(A7)
00F8: 	MOVE.L	A2,-(A7)
00FA: 	JSR	locProc37
00FE: 	ADDQ.L	#8,A7
0100: 	BRA.S	L0838
0102: L07F0	MOVE.L	D6,-(A7)
0104: 	JSR	locProc35
0108: 	MOVEA.L	D0,A2
010A: 	CLR.L	$FFEC(A6)
010E: 	PEA	$FFEC(A6)
0112: 	PEA	$0080
0116: 	MOVE.L	#$6174706C,-(A7)	;'atpl'
011C: 	MOVE.L	A2,-(A7)
011E: 	JSR	locProc44
0122: 	SUBQ.L	#2,A7
0124: 	_ResError	
0126: 	MOVE.W	(A7)+,D0
0128: 	EXT.L	D0
012A: 	MOVE.W	D0,D0
012C: 	LEA	$0014(A7),A7
0130: 	BEQ.S	L0838
0132: 	PEA	$FFEC(A6)
0136: 	PEA	$0080
013A: 	MOVE.L	#$6174706C,-(A7)	;'atpl'
0140: 	MOVE.L	A2,-(A7)
0142: 	JSR	locProc44
0146: 	LEA	$0010(A7),A7
014A: L0838	MOVE.L	A2,-(A7)
014C: 	JSR	locProc39
0150: 	MOVE.L	D6,-(A7)
0152: 	MOVE.L	(A2),-(A7)
0154: 	MOVE.L	D3,-(A7)
0156: 	JSR	locProc41
015A: 	MOVE.L	A2,-(A7)
015C: 	_ChangedResource	
015E: 	MOVE.L	A2,-(A7)
0160: 	_WriteResource	
0162: 	MOVE.L	A2,-(A7)
0164: 	JSR	locProc40
0168: 	LEA	locProc1,A4
016C: 	MOVE.L	A4,-(A7)
016E: 	JSR	locProc38
0172: 	MOVEA.L	D0,A2
0174: 	MOVE.L	A2,-(A7)
0176: 	JSR	locProc36
017A: 	MOVE.L	D0,D6
017C: 	SUBQ.L	#4,A7
017E: 	MOVE.L	#$44415441,-(A7)	;'DATA'
0184: 	MOVE.W	#$F05F,-(A7)
0188: 	_GetResource	
018A: 	MOVE.L	(A7)+,D0
018C: 	MOVEA.L	D0,A3
018E: 	MOVE.L	A3,D4
0190: 	LEA	$001C(A7),A7
0194: 	BEQ	L08A6
0198: 	SUBQ.L	#2,A7
019A: 	MOVE.L	A3,-(A7)
019C: 	_HomeResFile	
019E: 	MOVE.W	(A7)+,D0
01A0: 	CMP.W	$0016(A6),D0
01A4: 	BNE	L08A6
01A8: 	MOVE.L	A3,-(A7)
01AA: 	_LoadResource	
01AC: 	MOVE.L	D6,-(A7)
01AE: 	MOVE.L	A3,-(A7)
01B0: 	JSR	locProc37
01B4: 	ADDQ.L	#8,A7
01B6: 	BRA.S	L08F2
01B8: L08A6	MOVE.L	D6,-(A7)
01BA: 	JSR	locProc35
01BE: 	MOVEA.L	D0,A3
01C0: 	CLR.L	$FFEC(A6)
01C4: 	PEA	$FFEC(A6)
01C8: 	MOVE.L	#$FFFFF05F,-(A7)
01CE: 	MOVE.L	#$44415441,-(A7)	;'DATA'
01D4: 	MOVE.L	A3,-(A7)
01D6: 	JSR	locProc44
01DA: 	SUBQ.L	#2,A7
01DC: 	_ResError	
01DE: 	MOVE.W	(A7)+,D0
01E0: 	EXT.L	D0
01E2: 	MOVE.W	D0,D0
01E4: 	LEA	$0014(A7),A7
01E8: 	BEQ.S	L08F2
01EA: 	PEA	$FFEC(A6)
01EE: 	MOVE.L	#$FFFFF05F,-(A7)
01F4: 	MOVE.L	#$44415441,-(A7)	;'DATA'
01FA: 	MOVE.L	A3,-(A7)
01FC: 	JSR	locProc44
0200: 	LEA	$0010(A7),A7
0204: L08F2	MOVE.L	A3,-(A7)
0206: 	JSR	locProc39
020A: 	MOVE.L	D6,-(A7)
020C: 	MOVE.L	(A3),-(A7)
020E: 	MOVE.L	(A2),-(A7)
0210: 	JSR	locProc41
0214: 	MOVE.L	A3,-(A7)
0216: 	_ChangedResource	
0218: 	MOVE.L	A3,-(A7)
021A: 	_WriteResource	
021C: 	MOVE.L	A3,-(A7)
021E: 	JSR	locProc40
0222: 	LEA	$0014(A7),A7
0226: 	MOVEM.L	$FFC8(A6),D2-D7/A2-A4
022C: 	UNLK	A6
022E: 	RTS	
0230: L091E	.WORD	$600C,0,0,$2423	;[`.....$#]
0238: 	.WORD	$2324,$5B56,$315D,$2848	;[#$[V1](H]
0240: 	.WORD	$A04A,$204C,$A029,$4EBA	;[.J L.)N.]
0248: 	.WORD	$1E,$6614,$203A,$FFE4	;[..f. :..]
0250: 	.WORD	$680,9,$3A80,$B0B8	;[....:...]
0258: 	.WORD	$20C,$6E04,$4EBA,$3C	;[..n.N..<]
0260: 	.WORD	$4E75,$5642,$4331,$2078	;[NuVBC1 x]
0268: 	.WORD	$162,$2678,$166,$43E8	;[.b&x.fC.]
0270: 	.WORD	$10,$CA9,$2423,$2324	;[....$##$]
0278: 	.WORD	8,$660E,$CA9,$5B56	;[..f...[V]
0280: 	.WORD	$315D,$C,$6604,$70FF	;[1]..f.p.]
0288: 	.WORD	$4E75,$2050,$2008,$6706	;[Nu P .g.]
0290: 	.WORD	$B7C8,$6702,$60D8,$7000	;[..g.`.p.]
0298: 	.WORD	$4E75,$43FA,$298,$45FA	;[NuC...E.]
02A0: 	.WORD	$78,$93CA,$2009,$680	;[.x.. ...]
02A8: 	.WORD	0,$20,$A51E,$3000	;[... ..0.]
02B0: 	.WORD	$6660,$2F08,$43FA,$27E	;[f`/.C..~]
02B8: 	.WORD	$45FA,$5E,$93CA,$2009	;[E..^.. .]
02C0: 	.WORD	$2248,$D2FC,$20,$41FA	;["H... A.]
02C8: 	.WORD	$50,$A02E,$205F,$317C	;[.P.. _1|]
02D0: 	.WORD	1,4,$43E8,$20	;[....C.. ]
02D8: 	.WORD	$2149,6,$317C,$E10	;[!I..1|..]
02E0: 	.WORD	$A,$317C,$A,$C	;[..1|....]
02E8: 	.WORD	$2F08,$A033,$205F,$43E8	;[/..3 _C.]
02F0: 	.WORD	$10,$4291,$237C,$2423	;[..B.#|$#]
02F8: 	.WORD	$2324,8,$237C,$5B56	;[#$..#|[V]
0300: 	.WORD	$315D,$C,$303C,$A003	;[1]..0<..]
0308: 	.WORD	$2F09,$A146,$225F,$2348	;[/..F"_#H]
0310: 	.WORD	4,$4E75,$5630,$3031	;[..NuV001]
0318: L0A06	.WORD	$41FA,$FFFE,$90FC,$20	;[A...... ]
0320: 	.WORD	$317C,$E10,$A,$D0FC	;[1|......]
0328: 	.WORD	$10,$2F08,$4850,$4EBA	;[../.HPN.]
0330: 	.WORD	$2C,$584F,$205F,$2010	;[.,XO _ .]
0338: 	.WORD	$C80,0,$E,$6D0A	;[......m.]
0340: 	.WORD	$303C,$A003,$41FA,$190	;[0<..A...]
0348: 	.WORD	$A047,$4E75,$206F,4	;[.GNu o..]
0350: 	.WORD	$A029,$4E75,$206F,4	;[.)Nu o..]
0358: 	.WORD	$A02A,$4E75,$48E7,$2020	;[.*NuH.  ]
0360: 	.WORD	$242F,$C,$2478,$A50	;[$/..$x.P]
0368: 	.WORD	$602C,$2F0A,$4EBA,$FFDE	;[`,/.N...]
0370: 	.WORD	$2052,$3038,$900,$B068	;[ R08...h]
0378: 	.WORD	$14,$588F,$660A,$2F02	;[..X.f./.]
0380: 	.WORD	$2F08,$4EBA,$1E,$508F	;[/.N...P.]
0388: 	.WORD	$2F0A,$4EBA,$FFC8,$2052	;[/.N... R]
0390: 	.WORD	$2468,$10,$588F,$200A	;[$h..X. .]
0398: 	.WORD	$6600,$FFD0,$4CDF,$404	;[f...L...]
03A0: 	.WORD	$4E75,$48E7,$3E30,$226F	;[NuH.>0"o]
03A8: 	.WORD	$20,$246F,$24,$4241	;[. $o.$BA]
03B0: 	.WORD	$7400,$3029,$18,$48C0	;[t.0)..H.]
03B8: 	.WORD	$D089,$2640,$3813,$5244	;[..&@8.RD]
03C0: 	.WORD	$4243,$6040,$3003,$48C0	;[BC`@0.H.]
03C8: 	.WORD	$E780,$CB3,$5655,$4C54	;[....VULT]
03D0: 	.WORD	$802,$6602,$7401,$3003	;[..f.t.0.]
03D8: 	.WORD	$48C0,$E780,$CB3,$434F	;[H.....CO]
03E0: 	.WORD	$4445,$802,$661C,$7201	;[DE..f.r.]
03E8: 	.WORD	$3003,$48C0,$E780,$3A33	;[0.H...:3]
03F0: 	.WORD	$806,$5245,$3003,$48C0	;[..RE0.H.]
03F8: 	.WORD	$E780,$3C33,$808,$646	;[..<3...F]
0400: 	.WORD	$1C,$5243,$B644,$6D00	;[..RC.Dm.]
0408: 	.WORD	$FFBC,$702C,$B092,$6C1E	;[..p,..l.]
0410: 	.WORD	$4A82,$671A,$4A41,$6716	;[J.g.JAg.]
0418: 	.WORD	$3005,$48C0,$2F00,$3006	;[0.H./.0.]
0420: 	.WORD	$48C0,$2F00,$2F09,$4EBA	;[H././.N.]
0428: 	.WORD	$12,$4FEF,$C,$4A82	;[..O...J.]
0430: 	.WORD	$6702,$5292,$4CDF,$C7C	;[g.R.L..|]
0438: 	.WORD	$4E75	;[Nu......]

;Seg 1 = DATA ID# -4001 proc 13 of 46 (local)

0000: L0B28	LINK	A6,#$FFF4
0004: 	MOVEM.L	D2-D5/A2-A3,-(A7)
0008: 	MOVEA.L	$0008(A6),A0
000C: 	MOVE.W	$000E(A6),D0
0010: 	MOVE.W	$0012(A6),D1
0014: 	CLR.W	D3
0016: 	MOVE.W	D3,D4
0018: 	EXT.L	D0
001A: 	ADDA.L	D0,A0
001C: 	MOVE.L	A0,D5
001E: 	MOVEQ	$01,D2
0020: 	BRA.S	L0B84
0022: L0B4A	MOVE.W	D2,D0
0024: 	EXT.L	D0
0026: 	MULS	#$0C,D0
002A: 	MOVEA.L	D0,A0
002C: 	ADDA.L	D5,A0
002E: 	LEA	$FFF4(A6),A1
0032: 	MOVE.L	(A0)+,(A1)+
0034: 	MOVE.L	(A0)+,(A1)+
0036: 	MOVE.L	(A0)+,(A1)+
0038: 	CMPI.W	#$000D,$FFF4(A6)
003E: 	BNE.S	L0B76
0040: 	TST.L	$FFFC(A6)
0044: 	BEQ.S	L0B82
0046: 	MOVEQ	$01,D4
0048: 	MOVEA.L	$FFFC(A6),A3
004C: 	BRA.S	L0B82
004E: L0B76	TST.L	$FFFC(A6)
0052: 	BEQ.S	L0B82
0054: 	MOVEQ	$01,D3
0056: 	MOVEA.L	$FFFC(A6),A2
005A: L0B82	ADDQ.W	#1,D2
005C: L0B84	CMP.W	D1,D2
005E: 	BLT	L0B4A
0062: 	TST.W	D4
0064: 	BEQ.S	L0BA8
0066: 	BTST	#$0000,$020F
006C: 	BLE.S	L0B9E
006E: 	MOVE.L	#$000003DE,D0
0074: 	BRA.S	L0BA4
0076: L0B9E	MOVE.L	#$00000472,D0
007C: L0BA4	MOVEA.L	(A3),A0
007E: 	BRA.S	L0BB0
0080: L0BA8	TST.W	D3
0082: 	BEQ.S	L0BB2
0084: 	MOVEA.L	(A2),A0
0086: 	MOVEQ	$21,D0
0088: L0BB0	ADDA.L	D0,A0
008A: L0BB2	MOVE.L	A0,-(A7)
008C: 	JSR	locProc14
0090: 	ADDQ.L	#4,A7
0092: 	MOVEM.L	$FFDC(A6),D2-D5/A2-A3
0098: 	UNLK	A6
009A: 	RTS	
009C: 	.WORD	$41FA,$FE40,$90FC,$10	;[A..@....]
00A4: 	.WORD	$2068,4,$303C,$A003	;[ h..0<..]
00AC: 	.WORD	$A047,$7660,$429F,$51CB	;[.Gv`B.Q.]
00B4: 	.WORD	$FFFC,$43FA,$FFE4,$45FA	;[..C...E.]
00BC: 	.WORD	$FE22,$93CA,$2009,$5140	;[.".. .Q@]
00C4: 	.WORD	$421A,$51C8,$FFFC,$9DCE	;[B.Q.....]
00CC: 	.WORD	$4ED0,$4E75	;[N.Nu....]

;Seg 1 = DATA ID# -4001 proc 14 of 46 (local)

0000: L0BF8	MOVEA.L	$0004(A7),A4
0004: 	MOVEQ	$60,D3
0006: L0BFE	CLR.L	(A7)+
0008: 	DBRA	D3,L0BFE
000C: 	LEA	L0BF8,A1
0010: 	LEA	L0A06,A2
0014: 	SUBA.L	A2,A1
0016: 	MOVE.L	A1,D0
0018: 	SUBI.L	#$00000010,D0
001E: L0C16	CLR.B	(A2)+
0020: 	DBRA	D0,L0C16
0024: 	SUBA.L	A6,A6
0026: 	JMP	(A4)
0028: 	RTS	
002A: L0C22	.WORD	$4E75,$6004,0,0	;[Nu`.....]
0032: 	.WORD	$2848,$A04A,$204C,$A029	;[(H.J L.)]
003A: 	.WORD	$4EBA,$1E,$6614,$203A	;[N...f. :]
0042: 	.WORD	$FFEC,$680,5,$4600	;[......F.]
004A: 	.WORD	$B0B8,$20C,$6E04,$4EBA	;[....n.N.]
0052: 	.WORD	$3C,$4E75,$5642,$4332	;[.<NuVBC2]
005A: 	.WORD	$2078,$162,$2678,$166	;[ x.b&x.f]
0062: 	.WORD	$43E8,$10,$CA9,$2423	;[C.....$#]
006A: 	.WORD	$2324,8,$660E,$CA9	;[#$..f...]
0072: 	.WORD	$5B56,$325D,$C,$6604	;[[V2]..f.]
007A: 	.WORD	$70FF,$4E75,$2050,$2008	;[p.Nu P .]
0082: 	.WORD	$6706,$B7C8,$6702,$60D8	;[g...g.`.]
008A: 	.WORD	$7000,$4E75,$43FA,$17C	;[p.NuC..|]
0092: 	.WORD	$45FA,$6A,$93CA,$2009	;[E..j.. .]
009A: 	.WORD	$680,0,$20,$A51E	;[..... ..]
00A2: 	.WORD	$3000,$6652,$2F08,$43FA	;[0.fR/.C.]
00AA: 	.WORD	$162,$45FA,$50,$93CA	;[.bE..P..]
00B2: 	.WORD	$2009,$2248,$D2FC,$20	;[ ."H... ]
00BA: 	.WORD	$41FA,$42,$A02E,$205F	;[A..B.. _]
00C2: 	.WORD	$317C,1,4,$43E8	;[1|....C.]
00CA: 	.WORD	$20,$2149,6,$317C	;[. !I..1|]
00D2: 	.WORD	$E10,$A,$317C,$A	;[....1|..]
00DA: 	.WORD	$C,$2F08,$A033,$205F	;[../..3 _]
00E2: 	.WORD	$43E8,$10,$4291,$237C	;[C...B.#|]
00EA: 	.WORD	$2423,$2324,8,$237C	;[$##$..#|]
00F2: 	.WORD	$5B56,$325D,$C,$4E75	;[[V2]..Nu]
00FA: 	.WORD	$5630,$3032,$41FA,$FFFE	;[V002A...]
0102: 	.WORD	$90FC,$20,$317C,$E10	;[... 1|..]
010A: 	.WORD	$A,$D0FC,$10,$4850	;[......HP]
0112: 	.WORD	$4EBA,$16,$584F,$4E75	;[N...XONu]
011A: 	.WORD	$206F,4,$A029,$4E75	;[ o...)Nu]
0122: 	.WORD	$206F,4,$A02A,$4E75	;[ o...*Nu]
012A: 	.WORD	$48E7,$2020,$242F,$C	;[H.  $/..]
0132: 	.WORD	$2478,$A50,$602C,$2F0A	;[$x.P`,/.]
013A: 	.WORD	$4EBA,$FFDE,$2052,$3038	;[N... R08]
0142: 	.WORD	$900,$B068,$14,$588F	;[...h..X.]
014A: 	.WORD	$660A,$2F02,$2F08,$4EBA	;[f././.N.]
0152: 	.WORD	$1E,$508F,$2F0A,$4EBA	;[..P./.N.]
015A: 	.WORD	$FFC8,$2052,$2468,$10	;[.. R$h..]
0162: 	.WORD	$588F,$200A,$6600,$FFD0	;[X. .f...]
016A: 	.WORD	$4CDF,$404,$4E75,$48E7	;[L...NuH.]
0172: 	.WORD	$3020,$206F,$10,$246F	;[0  o..$o]
017A: 	.WORD	$14,$4240,$7400,$3028	;[..B@t.0(]
0182: 	.WORD	$18,$48C0,$D088,$2240	;[..H..."@]
018A: 	.WORD	$3611,$5243,$4241,$6026	;[6.RCBA`&]
0192: 	.WORD	$3001,$48C0,$E780,$CB1	;[0.H.....]
019A: 	.WORD	$5655,$4C54,$802,$6602	;[VULT..f.]
01A2: 	.WORD	$7401,$3001,$48C0,$E780	;[t.0.H...]
01AA: 	.WORD	$CB1,$4552,$4943,$802	;[..ERIC..]
01B2: 	.WORD	$6602,$7401,$5241,$B243	;[f.t.RA.C]
01BA: 	.WORD	$6D00,$FFD6,$7018,$B092	;[m...p...]
01C2: 	.WORD	$6C08,$4A82,$6704,$4EBA	;[l.J.g.N.]
01CA: 	.WORD	$E,$4A82,$6702,$5292	;[..J.g.R.]
01D2: 	.WORD	$4CDF,$40C,$4E75,$48E7	;[L...NuH.]
01DA: 	.WORD	$8080,$A9FF,$41FA,$FF1E	;[....A...]
01E2: 	.WORD	$90FC,$20,$4268,$A	;[... Bh..]
01EA: 	.WORD	$204D,$D0FC,$20,$5848	;[ M... XH]
01F2: 	.WORD	$D0FC,$20,$7010,$690	;[... p...]
01FA: 	.WORD	0,4,$D0FC,$40	;[.......@]
0202: 	.WORD	$51C8,$FFF4,$4CDF,$101	;[Q...L...]
020A: 	.WORD	$4E75,$4523,$5612,$4E75	;[NuE#V.Nu]
0212: L0E0A	.WORD	$6004,0,0,$2848	;[`.....(H]
021A: 	.WORD	$A04A,$204C,$A029,$203A	;[.J L.) :]
0222: 	.WORD	$FFF2,$680,2,$A300	;[........]
022A: 	.WORD	$B0B8,$20C,$6E04,$4EBA	;[....n.N.]
0232: 	.WORD	$52,$4E75,$206F,4	;[.RNu o..]
023A: 	.WORD	$A029,$4E75,$206F,4	;[.)Nu o..]
0242: 	.WORD	$A02A,$4E75,$202F,$C	;[.*Nu /..]
024A: 	.WORD	$226F,8,$206F,4	;["o.. o..]
0252: 	.WORD	$A02E,$4E75,$202F,4	;[..Nu /..]
025A: 	.WORD	$A122,$21C0,$220,$2008	;[."!..  .]
0262: 	.WORD	$4E75,$2038,$2A6,$4E75	;[Nu 8..Nu]
026A: 	.WORD	$206F,4,$A01B,$21C0	;[ o....!.]
0272: 	.WORD	$220,$4E75,$A11A,$21C0	;[. Nu..!.]
027A: 	.WORD	$220,$2008,$4E75,$4C44	;[.  .NuLD]
0282: 	.WORD	$574D	;[WM......]

;Seg 1 = DATA ID# -4001 proc 15 of 46 (local)

0000: L0E7C	LINK	A6,#$FEDC
0004: 	BTST	#$0002,$017B
000A: 	BEQ.S	L0E94
000C: 	BTST	#$0007,$017A
0012: 	BEQ.S	L0E94
0014: 	BRA	L0F14
0018: L0E94	JSR	locProc16
001C: 	TST.L	D0
001E: 	BEQ.S	L0EA0
0020: 	BRA	L0F14
0024: L0EA0	PEA	$FFF0(A6)
0028: 	PEA	$FFEC(A6)
002C: 	JSR	locProc18
0030: 	TST.L	D0
0032: 	ADDQ.L	#8,A7
0034: 	BEQ.S	L0EB8
0036: 	PEA	$0005
003A: 	BRA.S	L0F0A
003C: L0EB8	PEA	$FFFC(A6)
0040: 	PEA	$FFF8(A6)
0044: 	PEA	$FEE6(A6)
0048: 	PEA	$FFF4(A6)
004C: 	MOVE.L	$FFF0(A6),-(A7)
0050: 	MOVE.L	$FFEC(A6),-(A7)
0054: 	JSR	locProc19
0058: 	TST.L	D0
005A: 	LEA	$0018(A7),A7
005E: 	BEQ.S	L0EE2
0060: 	PEA	$000F
0064: 	BRA.S	L0F0A
0066: L0EE2	MOVE.L	$FFFC(A6),-(A7)
006A: 	MOVE.L	$FFF8(A6),-(A7)
006E: 	PEA	$FEE6(A6)
0072: 	MOVE.L	$FFF4(A6),-(A7)
0076: 	MOVE.L	$FFF0(A6),-(A7)
007A: 	MOVE.L	$FFEC(A6),-(A7)
007E: 	JSR	locProc17
0082: 	TST.L	D0
0084: 	LEA	$0018(A7),A7
0088: 	BEQ.S	L0F14
008A: 	PEA	$0014
008E: L0F0A	JSR	locProc20
0092: 	MOVEQ	$00,D0
0094: 	ADDQ.L	#4,A7
0096: 	BRA.S	L0F16
0098: L0F14	MOVEQ	$00,D0
009A: L0F16	UNLK	A6
009C: 	RTS	
009E: L0F1A	.WORD	$48E7,$3000,$242F,$C	;[H.0.$/..]
00A6: 	.WORD	$4EBA,$FF4A,$2600,$4EBA	;[N..J&.N.]
00AE: 	.WORD	$FF32,$2F00,$4EBA,$FF32	;[.2/.N..2]
00B6: 	.WORD	$2F02,$4EBA,$FF18,$2400	;[/.N...$.]
00BE: 	.WORD	$2F03,$4EBA,$FF24,$4FEF	;[/.N..$O.]
00C6: 	.WORD	$C,$2002,$4CDF,$C	;[.. .L...]
00CE: 	.WORD	$4E75	;[Nu......]

;Seg 1 = DATA ID# -4001 proc 16 of 46 (local)

0000: L0F4C	MOVEA.L	$011C,A0
0004: 	LEA	$00B0(A0),A0
0008: 	TST.L	(A0)
000A: 	BNE.S	L0F5C
000C: 	MOVEQ	$00,D0
000E: 	BRA.S	L0F5E
0010: L0F5C	MOVEQ	$01,D0
0012: L0F5E	RTS	

;Seg 1 = DATA ID# -4001 proc 17 of 46 (local)

0000: L0F60	MOVEM.L	D2-D3/A2-A4,-(A7)
0004: 	MOVEA.L	$0018(A7),A3
0008: 	MOVE.L	$001C(A7),D0
000C: 	MOVEA.L	$0020(A7),A2
0010: 	MOVEA.L	A2,A0
0012: 	LEA	$011E(A0),A0
0016: 	CMP.L	A0,D0
0018: 	BCC.S	L0F80
001A: 	MOVEQ	$02,D0
001C: 	BRA	L1052
0020: L0F80	PEA	$0028
0024: 	JSR	L0F1A
0028: 	MOVE.L	D0,D2
002A: 	PEA	$0008
002E: 	JSR	L0F1A
0032: 	MOVE.L	D0,D3
0034: 	MOVE.L	D2,-(A7)
0036: 	JSR	L0E2E
003A: 	MOVE.L	D3,-(A7)
003C: 	JSR	L0E2E
0040: 	MOVEA.L	D2,A4
0042: 	MOVE.L	(A4),D1
0044: 	MOVEA.L	D3,A4
0046: 	MOVE.L	(A4),D0
0048: 	MOVEA.L	D0,A4
004A: 	MOVE.L	A2,$0004(A4)
004E: 	CLR.L	(A2)
0050: 	MOVEA.L	$0034(A7),A0
0054: 	LEA	$0008(A2),A1
0058: 	MOVE.W	(A0)+,(A1)+
005A: 	MOVE.W	(A0)+,(A1)+
005C: 	MOVE.W	(A0)+,(A1)+
005E: 	MOVE.L	$0038(A7),$0012(A2)
0064: 	MOVE.L	$003C(A7),$0016(A2)
006A: 	MOVEA.L	D0,A4
006C: 	CLR.L	(A4)
006E: 	MOVEA.L	A3,A0
0070: 	MOVEA.L	D1,A4
0072: 	MOVE.L	A3,(A4)
0074: 	MOVE.W	(A0),D0
0076: 	EXT.L	D0
0078: 	ANDI.L	#$0000FF00,D0
007E: 	MOVEA.L	D1,A4
0080: 	MOVE.W	D0,$0004(A4)
0084: 	MOVEA.L	D1,A4
0086: 	ORI.W	#$0020,$0004(A4)
008C: 	MOVEA.L	D1,A4
008E: 	CLR.W	$0006(A4)
0092: 	MOVEA.L	D1,A4
0094: 	CLR.L	$0008(A4)
0098: 	MOVEA.L	D1,A4
009A: 	CLR.L	$000C(A4)
009E: 	MOVEA.L	D1,A4
00A0: 	CLR.L	$0010(A4)
00A4: 	MOVEA.L	D1,A4
00A6: 	MOVE.L	D3,$0014(A4)
00AA: 	MOVEA.L	D1,A4
00AC: 	MOVE.W	#$FFD3,$0018(A4)
00B2: 	MOVEA.L	D1,A4
00B4: 	CLR.L	$001A(A4)
00B8: 	MOVEA.L	D1,A4
00BA: 	CLR.L	$001E(A4)
00BE: 	MOVEA.L	D1,A4
00C0: 	MOVE.W	$0002(A0),$0022(A4)
00C6: 	MOVEA.L	D1,A4
00C8: 	MOVE.W	$0004(A0),$0024(A4)
00CE: 	MOVEA.L	D1,A4
00D0: 	MOVE.W	$0006(A0),$0026(A4)
00D6: 	MOVEA.L	$011C,A0
00DA: 	LEA	$00B0(A0),A0
00DE: 	MOVE.L	D2,(A0)
00E0: 	MOVE.L	D2,-(A7)
00E2: 	JSR	L0E36
00E6: 	MOVE.L	D3,-(A7)
00E8: 	JSR	L0E36
00EC: 	MOVEQ	$00,D0
00EE: 	LEA	$0018(A7),A7
00F2: L1052	MOVEM.L	(A7)+,D2-D3/A2-A4
00F6: 	RTS	

;Seg 1 = DATA ID# -4001 proc 18 of 46 (local)

0000: L1058	MOVEA.L	$0004(A7),A0
0004: 	MOVEA.L	$0008(A7),A1
0008: 	MOVE.L	$0108,D1
000C: 	ASR.L	#$0001,D1
000E: 	ADDI.L	#$00000400,D1
0014: 	MOVE.L	$010C,D0
0018: 	SUBI.L	#$00003C00,D0
001E: 	CMP.L	D0,D1
0020: 	BLT.S	L107E
0022: 	MOVEQ	$01,D1
0024: 	BRA.S	L10A2
0026: L107E	MOVE.L	$010C,(A1)
002A: 	SUBI.L	#$00003C00,$010C
0032: 	MOVE.L	$010C,D1
0036: 	MOVEQ	$FC,D0
0038: 	AND.L	D0,D1
003A: 	MOVE.L	D1,$010C
003E: 	MOVE.L	$010C,D1
0042: 	MOVEQ	$10,D0
0044: 	ADD.L	D0,D1
0046: 	MOVE.L	D1,(A0)
0048: 	MOVEQ	$00,D1
004A: L10A2	MOVE.L	D1,D0
004C: 	RTS	

;Seg 1 = DATA ID# -4001 proc 19 of 46 (local)

0000: L10A6	MOVEM.L	D2-D4/A2-A3,-(A7)
0004: 	MOVE.L	$0018(A7),D3
0008: 	MOVE.L	$001C(A7),D4
000C: 	MOVEA.L	$0020(A7),A2
0010: 	SUBQ.L	#4,A7
0012: 	MOVE.L	#$6174706C,-(A7)	;'atpl'
0018: 	MOVE.W	#$0080,-(A7)
001C: 	_GetResource	
001E: 	MOVE.L	(A7)+,D0
0020: 	MOVEA.L	D0,A3
0022: 	SUBQ.L	#2,A7
0024: 	_ResError	
0026: 	MOVE.W	(A7)+,D0
0028: 	EXT.L	D0
002A: 	MOVE.W	D0,D0
002C: 	BEQ.S	L10DA
002E: 	MOVEQ	$09,D0
0030: 	BRA	L119C
0034: L10DA	MOVE.L	A3,-(A7)
0036: 	JSR	L0E2E
003A: 	SUBQ.L	#4,A7
003C: 	MOVE.L	A3,-(A7)
003E: 	_SizeRsrc	
0040: 	MOVE.L	(A7)+,D0
0042: 	MOVE.L	D0,D2
0044: 	ADDQ.L	#4,A7
0046: 	BLT	L10F8
004A: 	MOVE.L	D2,D0
004C: 	ADD.L	D3,D0
004E: 	CMP.L	D0,D4
0050: 	BCC.S	L10FE
0052: L10F8	MOVEQ	$01,D0
0054: 	BRA	L119C
0058: L10FE	MOVE.L	D2,-(A7)
005A: 	MOVE.L	D3,-(A7)
005C: 	MOVE.L	(A3),-(A7)
005E: 	JSR	L0E3E
0062: 	MOVE.L	D2,D0
0064: 	ADDQ.L	#4,D0
0066: 	MOVEQ	$FE,D1
0068: 	AND.L	D1,D0
006A: 	MOVE.L	D0,D2
006C: 	ADD.L	D2,D3
006E: 	MOVE.L	A3,-(A7)
0070: 	JSR	L0E36
0074: 	MOVE.L	A3,-(A7)
0076: 	_ReleaseResource	
0078: 	SUBQ.L	#4,A7
007A: 	MOVE.L	#$44415441,-(A7)	;'DATA'
0080: 	MOVE.W	#$F05F,-(A7)
0084: 	_GetResource	
0086: 	MOVE.L	(A7)+,D0
0088: 	MOVEA.L	D0,A3
008A: 	SUBQ.L	#2,A7
008C: 	_ResError	
008E: 	MOVE.W	(A7)+,D0
0090: 	EXT.L	D0
0092: 	MOVE.W	D0,D0
0094: 	LEA	$0010(A7),A7
0098: 	BEQ.S	L1144
009A: 	MOVEQ	$06,D0
009C: 	BRA.S	L119C
009E: L1144	MOVE.L	A3,-(A7)
00A0: 	JSR	L0E2E
00A4: 	SUBQ.L	#4,A7
00A6: 	MOVE.L	A3,-(A7)
00A8: 	_SizeRsrc	
00AA: 	MOVE.L	(A7)+,D0
00AC: 	MOVE.L	D0,D2
00AE: 	MOVEA.L	$002C(A7),A0
00B2: 	MOVE.L	D3,(A0)
00B4: 	MOVEA.L	$0030(A7),A0
00B8: 	MOVE.L	D2,(A0)
00BA: 	TST.L	D2
00BC: 	ADDQ.L	#4,A7
00BE: 	BLT	L1170
00C2: 	MOVE.L	D2,D0
00C4: 	ADD.L	D3,D0
00C6: 	CMP.L	D0,D4
00C8: 	BCC.S	L1174
00CA: L1170	MOVEQ	$07,D0
00CC: 	BRA.S	L119C
00CE: L1174	MOVE.L	D2,-(A7)
00D0: 	MOVE.L	D3,-(A7)
00D2: 	MOVE.L	(A3),-(A7)
00D4: 	JSR	L0E3E
00D8: 	MOVE.L	D2,D0
00DA: 	ADDQ.L	#4,D0
00DC: 	MOVEQ	$FE,D1
00DE: 	AND.L	D1,D0
00E0: 	MOVE.L	D0,D2
00E2: 	ADD.L	D2,D3
00E4: 	MOVE.L	A3,-(A7)
00E6: 	JSR	L0E36
00EA: 	MOVE.L	A3,-(A7)
00EC: 	_ReleaseResource	
00EE: 	MOVE.L	D3,(A2)
00F0: 	MOVEQ	$00,D0
00F2: 	LEA	$0010(A7),A7
00F6: L119C	MOVEM.L	(A7)+,D2-D4/A2-A3
00FA: 	RTS	

;Seg 1 = DATA ID# -4001 proc 20 of 46 (local)

0000: L11A2	LINK	A6,#$FFE0
0004: 	MOVEM.L	D2-D4,-(A7)
0008: 	MOVE.L	$0008(A6),D2
000C: 	MOVEQ	$09,D4
000E: 	MOVE.B	#$24,$FFE3(A6)	;'$'
0014: 	BRA.S	L11E8
0016: L11B8	MOVE.W	D2,D1
0018: 	ANDI.W	#$000F,D1
001C: 	MOVE.W	D1,D0
001E: 	CMPI.W	#$0009,D0
0022: 	BLE.S	L11D2
0024: 	MOVE.W	D4,D1
0026: 	SUBQ.W	#1,D4
0028: 	MOVE.W	D1,D3
002A: 	EXT.L	D0
002C: 	MOVEQ	$37,D1
002E: 	BRA.S	L11DC
0030: L11D2	MOVE.W	D4,D1
0032: 	SUBQ.W	#1,D4
0034: 	MOVE.W	D1,D3
0036: 	EXT.L	D0
0038: 	MOVEQ	$30,D1
003A: L11DC	ADD.L	D1,D0
003C: 	MOVE.B	D0,$E2(A6,D3.W)
0040: 	MOVE.L	D2,D0
0042: 	ASR.L	#$0004,D0
0044: 	MOVE.L	D0,D2
0046: L11E8	CMPI.W	#$0001,D4
004A: 	BGT	L11B8
004E: 	MOVE.B	#$09,$FFE2(A6)
0054: 	PEA	$FFE2(A6)
0058: 	UNKNOWN	
005A: 	MOVEM.L	$FFD4(A6),D2-D4
0060: 	UNLK	A6
0062: 	RTS	
0064: L1206	.WORD	$3400,$E10,0,0	;[4.......]
006C: 	.WORD	$18,$1E,$24,$2A	;[.....$.*]
0074: 	.WORD	$30,$52E,$4844,$3230	;[.0..HD20]
007C: 	.WORD	$487A,$40,$6016,$487A	;[Hz.@`.Hz]
0084: 	.WORD	$4E,$6010,$487A,$70	;[.N`.Hz.p]
008C: 	.WORD	$600A,$487A,$56,$6004	;[`.Hz.V`.]
0094: 	.WORD	$487A,$11C,$48E7,$C0	;[Hz..H...]
009C: 	.WORD	$4267,$2F08,$2F09,$206F	;[Bg/./. o]
00A4: 	.WORD	$12,$4E90,$301F,$4CDF	;[..N.0.L.]
00AC: 	.WORD	$300,$584F,$828,1	;[..XO.(..]
00B4: 	.WORD	6,$6604,$2F38,$8FC	;[..f./8..]
00BC: 	.WORD	$4E75,$202F,8,$202F	;[Nu /.. /]
00C4: 	.WORD	4,$4240,$3F40,$C	;[..B@?@..]
00CC: 	.WORD	$205F,$508F,$4ED0,$202F	;[ _P.N. /]
00D4: 	.WORD	8,$202F,4,$4240	;[.. /..B@]
00DC: 	.WORD	$3F40,$C,$205F,$508F	;[?@.. _P.]
00E4: 	.WORD	$4ED0,$202F,8,$202F	;[N. /.. /]
00EC: 	.WORD	4,$4240,$3F40,$C	;[..B@?@..]
00F4: 	.WORD	$205F,$508F,$4ED0,$48E7	;[ _P.N.H.]
00FC: 	.WORD	$30,$246F,$10,$226F	;[.0$o.."o]
0104: 	.WORD	$C,$2069,$14,$2050	;[.. i.. P]
010C: 	.WORD	$2668,4,$302A,$1A	;[&h..0*..]
0114: 	.WORD	$C40,$FFFF,$6D44,$6E02	;[.@..mDn.]
011C: 	.WORD	$6008,$C40,$41,$663A	;[`..@.Af:]
0124: 	.WORD	$600A,$426B,$E,$426B	;[`.Bk..Bk]
012C: 	.WORD	$1C,$602E,$2069,$14	;[..`. i..]
0134: 	.WORD	$2050,$4A90,$6618,$2069	;[ PJ.f. i]
013C: 	.WORD	$14,$2050,$7001,$2080	;[.. Pp. .]
0144: 	.WORD	$2F0B,$2F09,$4EBA,$24	;[/./.N..$]
014C: 	.WORD	$4240,$508F,$600E,$4A93	;[B@P.`.J.]
0154: 	.WORD	$6708,$2F0B,$4EBA,$6C	;[g./.N..l]
015C: 	.WORD	$588F,$4240,$3F40,$14	;[X.B@?@..]
0164: 	.WORD	$4CDF,$C00,$205F,$508F	;[L... _P.]
016C: 	.WORD	$4ED0	;[N.......]

;Seg 1 = DATA ID# -4001 proc 21 of 46 (local)

0000: L1310	LINK	A6,#$FF00
0004: 	MOVEA.L	$0008(A6),A1
0008: 	MOVEA.L	$000C(A6),A0
000C: 	MOVE.W	$0018(A1),$0004(A0)
0012: 	MOVE.W	$0018(A1),D0
0016: 	EXT.L	D0
0018: 	NEG.L	D0
001A: 	SUBQ.L	#1,D0
001C: 	ASL.L	#$0005,D0
001E: 	ORI.L	#$0000C000,D0
0024: 	MOVE.W	D0,$0006(A0)
0028: 	MOVEQ	$01,D0
002A: 	MOVE.L	D0,(A0)
002C: 	CLR.W	$000E(A0)
0030: 	MOVE.W	#$FFFF,$0010(A0)
0036: 	CLR.W	$001A(A0)
003A: 	CLR.W	$001C(A0)
003E: 	MOVEQ	$00,D0
0040: 	UNLK	A6
0042: 	RTS	
0044: 	.WORD	$202F,8,$202F,4	;[ /.. /..]
004C: 	.WORD	$4240,$3F40,$C,$205F	;[B@?@.. _]
0054: 	.WORD	$508F,$4ED0,$2F0A,$246F	;[P.N./.$o]
005C: 	.WORD	8,$302A,$E,$6D00	;[..0*..m.]
0064: 	.WORD	$68,$C40,5,$6E60	;[.h.@..n`]
006C: 	.WORD	$D040,$303B,6,$4EFB	;[.@0;..N.]
0074: 	.WORD	2,$C,$14,$1C	;[........]
007C: 	.WORD	$24,$3A,$56,$357C	;[.$.:.V5|]
0084: 	.WORD	1,$E,$6042,$2F0A	;[....`B/.]
008C: 	.WORD	$4EBA,$42,$6038,$2F0A	;[N..B`8/.]
0094: 	.WORD	$4EBA,$332,$602A,$302A	;[N..2`*0*]
009C: 	.WORD	$1C,$526A,$1C,$C40	;[..Rj...@]
00A4: 	.WORD	$13,$6F24,$2F0A,$4EBA	;[..o$/.N.]
00AC: 	.WORD	$1D8,$6014,$302A,$1C	;[..`.0*..]
00B4: 	.WORD	$526A,$1C,$C40,$13	;[Rj...@..]
00BC: 	.WORD	$6F0E,$2F0A,$4EBA,$C2	;[o./.N...]
00C4: 	.WORD	$357C,5,$E,$588F	;[5|....X.]
00CC: 	.WORD	$245F,$4E75	;[$_Nu....]

;Seg 1 = DATA ID# -4001 proc 22 of 46 (local)

0000: L13E0	LINK	A6,#$FE54
0004: 	MOVE.L	A2,-(A7)
0006: 	MOVEA.L	$0008(A6),A2
000A: 	CLR.L	$FFCE(A6)
000E: 	MOVE.W	$0900,$FFDA(A6)
0014: 	CLR.W	$FFDE(A6)
0018: 	CLR.W	$FFD8(A6)
001C: 	LEA	$FEC2(A6),A0
0020: 	MOVE.L	A0,$FFD4(A6)
0024: 	CLR.B	$FEC2(A6)
0028: 	CLR.L	-(A7)
002A: 	PEA	$FFC2(A6)
002E: 	JSR	locProc32
0032: 	TST.W	$FFD2(A6)
0036: 	ADDQ.L	#8,A7
0038: 	BNE	L148C
003C: 	CLR.L	$FE62(A6)
0040: 	MOVE.L	$FFD4(A6),$FE68(A6)
0046: 	MOVE.L	$FFFC(A6),$FE86(A6)
004C: 	MOVE.W	$FFF6(A6),$FE6C(A6)
0052: 	CLR.W	$FE72(A6)
0056: 	CLR.L	-(A7)
0058: 	PEA	$FE56(A6)
005C: 	JSR	locProc33
0060: 	MOVE.W	D0,D0
0062: 	ADDQ.L	#8,A7
0064: 	BNE.S	L148C
0066: 	MOVE.L	$FE7A(A6),D0
006A: 	CMPI.L	#$56554C54,D0	;'VULT'
0070: 	BNE.S	L1460
0072: 	MOVE.W	#$0001,$001A(A2)
0078: 	MOVE.W	#$0003,$000E(A2)
007E: 	BRA.S	L1482
0080: L1460	CMPI.L	#$45524943,D0	;'ERIC'
0086: 	BNE.S	L1476
0088: 	MOVE.W	#$0001,$001A(A2)
008E: 	MOVE.W	#$0004,$000E(A2)
0094: 	BRA.S	L1482
0096: L1476	MOVE.W	#$0001,$001A(A2)
009C: 	MOVE.W	#$0002,$000E(A2)
00A2: L1482	MOVE.W	$0900,$0010(A2)
00A8: 	CLR.W	$001C(A2)
00AC: L148C	MOVEA.L	$FE50(A6),A2
00B0: 	UNLK	A6
00B2: 	RTS	
00B4: 	.WORD	$48E7,$3820,$246F,$14	;[H.8 $o..]
00BC: 	.WORD	$558F,$A994,$301F,$3800	;[U...0.8.]
00C4: 	.WORD	$3F2A,$10,$A998,$4227	;[?*....B']
00CC: 	.WORD	$A99B,$7609,$7205,$2038	;[..v.r. 8]
00D4: 	.WORD	$20C,$4EBA,$692,$5240	;[..N...R@]
00DC: 	.WORD	$598F,$2F3C,$434F,$4445	;[Y./<CODE]
00E4: 	.WORD	$3F00,$A9A0,$201F,$2000	;[?... . .]
00EC: 	.WORD	$6712,$6024,$598F,$2F3C	;[g.`$Y./<]
00F4: 	.WORD	$434F,$4445,$5343,$3F03	;[CODESC?.]
00FC: 	.WORD	$A9A0,$201F,$4A80,$6608	;[.. .J.f.]
0104: 	.WORD	$C43,1,$6E00,$FFE6	;[.C..n...]
010C: 	.WORD	$4A43,$6F12,$4A80,$670E	;[JCo.J.g.]
0114: 	.WORD	$2F00,$4EBA,$1A,$3F2A	;[/.N...?*]
011C: 	.WORD	$10,$A999,$588F,$1F3C	;[....X..<]
0124: 	.WORD	1,$A99B,$3F04,$A998	;[....?...]
012C: 	.WORD	$4CDF,$41C,$4E75,$48E7	;[L...NuH.]
0134: 	.WORD	$3020,$246F,$10,$1F3C	;[0 $o...<]
013C: 	.WORD	1,$A99B,$2F0A,$A9A2	;[..../...]
0144: 	.WORD	$558F,$A9AF,$301F,$48C0	;[U...0.H.]
014C: 	.WORD	$3000,$6600,$5E,$558F	;[0.f..^U.]
0154: 	.WORD	$2F0A,$A9A6,$301F,$3600	;[/...0.6.]
015C: 	.WORD	$3003,$240,$FFF7,$2F0A	;[0..@../.]
0164: 	.WORD	$3F00,$A9A7,$2F0A,$4EBA	;[?.../.N.]
016C: 	.WORD	$4E8,$598F,$2F0A,$A9A5	;[..Y./...]
0174: 	.WORD	$201F,$E280,$2200,$2038	;[ ...". 8]
017C: 	.WORD	$20C,$4EBA,$5EA,$D092	;[..N.....]
0184: 	.WORD	$2040,$7400,$588F,$1210	;[ @t.X...]
018C: 	.WORD	$7000,$1001,$4680,$1080	;[p...F...]
0194: 	.WORD	$5282,$5288,$7006,$B082	;[R.R.p...]
019C: 	.WORD	$6E00,$FFEC,$2F0A,$A9AA	;[n.../...]
01A4: 	.WORD	$2F0A,$A9B0,$2F0A,$3F03	;[/.../.?.]
01AC: 	.WORD	$A9A7,$4CDF,$40C,$4E75	;[..L...Nu]
01B4: 	.WORD	$48E7,$3C30,$246F,$1C	;[H.<0$o..]
01BC: 	.WORD	$558F,$A994,$301F,$3800	;[U...0.8.]
01C4: 	.WORD	$3F2A,$10,$A998,$598F	;[?*....Y.]
01CC: 	.WORD	$2F3C,$434F,$4445,$3F3C	;[/<CODE?<]
01D4: 	.WORD	$D,$A9A0,$201F,$2640	;[.... .&@]
01DC: 	.WORD	$260B,$6610,$2F0A,$4EBA	;[&.f./.N.]
01E4: 	.WORD	$FED0,$3F04,$A998,$588F	;[..?...X.]
01EC: 	.WORD	$6000,$104,$1F3C,1	;[`....<..]
01F4: 	.WORD	$A99B,$2F0B,$A9A2,$2F0B	;[../.../.]
01FC: 	.WORD	$4EBA,$456,$558F,$2F0B	;[N..VU./.]
0204: 	.WORD	$A9A6,$301F,$3A00,$3005	;[..0.:.0.]
020C: 	.WORD	$240,$FFF7,$2F0B,$3F00	;[.@../.?.]
0214: 	.WORD	$A9A7,$598F,$2F0B,$A9A5	;[..Y./...]
021C: 	.WORD	$201F,$2600,$7202,$2038	;[ .&.r. 8]
0224: 	.WORD	$20C,$4EBA,$542,$2200	;[..N..B".]
022C: 	.WORD	$588F,$6F00,$78,$2013	;[X.o..x .]
0234: 	.WORD	$680,0,$472,$5C80	;[.....r\.]
023C: 	.WORD	$2040,$2203,$B288,$6306	;[ @"...c.]
0244: 	.WORD	$10FC,1,$4210,$2013	;[....B. .]
024C: 	.WORD	$680,0,$21DA,$5C80	;[....!.\.]
0254: 	.WORD	$2040,$2203,$B288,$6306	;[ @"...c.]
025C: 	.WORD	$4218,$10BC,2,$2013	;[B..... .]
0264: 	.WORD	$680,0,$21DA,$720A	;[....!.r.]
026C: 	.WORD	$D081,$2040,$2203,$B288	;[.. @"...]
0274: 	.WORD	$6308,$10FC,1,$10BC	;[c.......]
027C: 	.WORD	$C1,$2003,$E480,$2200	;[.. ...".]
0284: 	.WORD	$2038,$20C,$4EBA,$4E0	;[ 8..N...]
028C: 	.WORD	$D093,$2040,$4242,$1210	;[.. @BB..]
0294: 	.WORD	$7000,$1001,$4680,$1080	;[p...F...]
029C: 	.WORD	$5242,$5288,$C42,6	;[RBR..B..]
02A4: 	.WORD	$6C34,$60EA,$2003,$E280	;[l4`. ...]
02AC: 	.WORD	$2200,$2038,$20C,$4EBA	;[". 8..N.]
02B4: 	.WORD	$4B6,$D093,$2040,$4242	;[.... @BB]
02BC: 	.WORD	$600E,$1210,$7000,$1001	;[`...p...]
02C4: 	.WORD	$4680,$1080,$5242,$5288	;[F...RBR.]
02CC: 	.WORD	$3202,$48C1,$2003,$E480	;[2.H. ...]
02D4: 	.WORD	$B280,$6D00,$FFE6,$2F0B	;[..m.../.]
02DC: 	.WORD	$A9AA,$2F0B,$A9B0,$2F0B	;[../.../.]
02E4: 	.WORD	$3F05,$A9A7,$3F2A,$10	;[?...?*..]
02EC: 	.WORD	$A999,$3F04,$A998,$4CDF	;[..?...L.]
02F4: 	.WORD	$C3C,$4E75	;[.<Nu....]

;Seg 1 = DATA ID# -4001 proc 23 of 46 (local)

0000: L16D8	LINK	A6,#$FFF4
0004: 	MOVEM.L	D2-D6/A2-A4,-(A7)
0008: 	MOVEA.L	$0008(A6),A2
000C: 	MOVE.W	$0010(A2),D5
0010: 	SUBQ.L	#2,A7
0012: 	_CurResFile	
0014: 	MOVE.W	(A7)+,D0
0016: 	MOVE.W	D0,$FFFE(A6)
001A: 	MOVE.W	D5,-(A7)
001C: 	_UseResFile	
001E: 	SUBQ.L	#4,A7
0020: 	MOVE.L	#$434F4445,-(A7)	;'CODE'
0026: 	CLR.W	-(A7)
0028: 	_GetResource	
002A: 	MOVE.L	(A7)+,D0
002C: 	MOVE.L	D0,D3
002E: 	SUBQ.L	#2,A7
0030: 	_ResError	
0032: 	MOVE.W	(A7)+,D0
0034: 	EXT.L	D0
0036: 	MOVE.W	D0,D0
0038: 	BNE	L17A2
003C: 	TST.L	D3
003E: 	BEQ	L17A2
0042: 	MOVE.L	D3,-(A7)
0044: 	JSR	locProc39
0048: 	SUBQ.L	#4,A7
004A: 	MOVE.L	D3,-(A7)
004C: 	_SizeRsrc	
004E: 	MOVE.L	(A7)+,D0
0050: 	MOVEA.L	D3,A4
0052: 	MOVEA.L	(A4),A0
0054: 	MOVE.L	(A0)+,D0
0056: 	MOVE.L	(A0)+,D0
0058: 	MOVE.L	(A0)+,D0
005A: 	MOVE.L	(A0)+,D0
005C: 	MOVEA.L	A0,A3
005E: 	MOVEA.L	A3,A0
0060: 	LEA	$FFF6(A6),A1
0064: 	MOVE.L	(A0)+,(A1)+
0066: 	MOVE.L	(A0)+,(A1)+
0068: 	CMPI.W	#$0001,$0004(A3)
006E: 	ADDQ.L	#4,A7
0070: 	BNE	L17A2
0074: 	MOVE.L	$0016(A2),-(A7)
0078: 	MOVE.L	$0012(A2),-(A7)
007C: 	PEA	$FFF6(A6)
0080: 	MOVE.W	D5,D0
0082: 	EXT.L	D0
0084: 	MOVE.L	D0,-(A7)
0086: 	JSR	locProc24
008A: 	MOVE.W	D0,D4
008C: 	LEA	$0010(A7),A7
0090: 	BLT	L17A2
0094: 	SUBQ.L	#2,A7
0096: 	MOVE.L	D3,-(A7)
0098: 	_GetResAttrs	
009A: 	MOVE.W	(A7)+,D0
009C: 	MOVE.W	D0,D6
009E: 	MOVE.W	D6,D0
00A0: 	ANDI.W	#$FFF7,D0
00A4: 	MOVE.L	D3,-(A7)
00A6: 	MOVE.W	D0,-(A7)
00A8: 	_SetResAttrs	
00AA: 	MOVE.W	D4,$0004(A3)
00AE: 	MOVE.W	#$0008,(A3)
00B2: 	MOVE.L	D3,-(A7)
00B4: 	_ChangedResource	
00B6: 	MOVE.L	D3,-(A7)
00B8: 	_WriteResource	
00BA: 	MOVE.L	D3,-(A7)
00BC: 	MOVE.W	D6,-(A7)
00BE: 	_SetResAttrs	
00C0: 	MOVE.W	D5,-(A7)
00C2: 	_UpdateResFile	
00C4: 	MOVE.W	$FFFE(A6),-(A7)
00C8: 	_UseResFile	
00CA: L17A2	MOVEM.L	$FFD4(A6),D2-D6/A2-A4
00D0: 	UNLK	A6
00D2: 	RTS	

;Seg 1 = DATA ID# -4001 proc 24 of 46 (local)

0000: L17AC	LINK	A6,#$FFF4
0004: 	MOVEM.L	D2-D6/A2-A3,-(A7)
0008: 	MOVE.W	$000A(A6),D3
000C: 	MOVEA.L	$000C(A6),A2
0010: 	MOVE.L	$0010(A6),D0
0014: 	MOVE.L	D0,D6
0016: 	CLR.B	-(A7)
0018: 	_SetResLoad	
001A: 	MOVEQ	$00,D5
001C: L17C8	SUBQ.L	#4,A7
001E: 	MOVE.L	#$434F4445,-(A7)	;'CODE'
0024: 	MOVE.W	D5,-(A7)
0026: 	_GetResource	
0028: 	MOVE.L	(A7)+,D0
002A: 	MOVE.L	D0,D4
002C: 	BEQ.S	L17EA
002E: 	SUBQ.L	#2,A7
0030: 	MOVE.L	D4,-(A7)
0032: 	_HomeResFile	
0034: 	MOVE.W	(A7)+,D0
0036: 	MOVE.W	D0,D1
0038: 	CMP.W	D0,D3
003A: 	BNE	L17F8
003E: L17EA	ADDQ.L	#1,D5
0040: 	TST.L	D4
0042: 	BEQ.S	L17F8
0044: 	MOVEQ	$64,D0
0046: 	CMP.L	D5,D0
0048: 	BGT	L17C8
004C: L17F8	MOVE.B	#$01,-(A7)
0050: 	_SetResLoad	
0052: 	TST.L	D4
0054: 	BEQ.S	L1808
0056: 	MOVEQ	$FF,D0
0058: 	BRA	L188E
005C: L1808	MOVE.L	$0014(A6),-(A7)
0060: 	JSR	locProc35
0064: 	MOVEA.L	D0,A3
0066: 	MOVE.L	A3,-(A7)
0068: 	JSR	locProc39
006C: 	CLR.B	$FFF6(A6)
0070: 	MOVEA.L	D6,A0
0072: 	ADDQ.L	#4,A0
0074: 	MOVEA.L	A0,A1
0076: 	MOVEA.L	A2,A0
0078: 	MOVE.L	(A0)+,(A1)+
007A: 	MOVE.L	(A0)+,(A1)+
007C: 	MOVE.L	$0014(A6),-(A7)
0080: 	MOVE.L	(A3),-(A7)
0082: 	MOVE.L	D6,-(A7)
0084: 	JSR	locProc41
0088: 	PEA	$FFF6(A6)
008C: 	MOVE.W	D5,D0
008E: 	EXT.L	D0
0090: 	MOVE.L	D0,-(A7)
0092: 	MOVE.L	#$434F4445,-(A7)	;'CODE'
0098: 	MOVE.L	A3,-(A7)
009A: 	JSR	locProc44
009E: 	SUBQ.L	#2,A7
00A0: 	_ResError	
00A2: 	MOVE.W	(A7)+,D0
00A4: 	EXT.L	D0
00A6: 	MOVE.W	D0,D0
00A8: 	LEA	$0024(A7),A7
00AC: 	BEQ.S	L1874
00AE: 	PEA	$FFF6(A6)
00B2: 	MOVE.W	D5,D0
00B4: 	EXT.L	D0
00B6: 	MOVE.L	D0,-(A7)
00B8: 	MOVE.L	#$434F4445,-(A7)	;'CODE'
00BE: 	MOVE.L	A3,-(A7)
00C0: 	JSR	locProc44
00C4: 	LEA	$0010(A7),A7
00C8: L1874	MOVE.L	A3,-(A7)
00CA: 	_ChangedResource	
00CC: 	MOVE.L	A3,-(A7)
00CE: 	_WriteResource	
00D0: 	MOVE.L	A3,-(A7)
00D2: 	MOVE.W	#$0020,-(A7)
00D6: 	_SetResAttrs	
00D8: 	MOVE.L	A3,-(A7)
00DA: 	JSR	locProc40
00DE: 	MOVE.L	D5,D0
00E0: 	ADDQ.L	#4,A7
00E2: L188E	MOVEM.L	$FFD8(A6),D2-D6/A2-A3
00E8: 	UNLK	A6
00EA: 	RTS	

;Seg 1 = DATA ID# -4001 proc 25 of 46 (local)

0000: L1898	JSR	locProc30
0004: 	LINK	A6,#$FFC0
0008: 	LEA	$FFC0(A6),A0
000C: 	MOVE.L	$0008(A6),$0012(A0)
0012: 	MOVE.W	$000E(A6),$0016(A0)
0018: 	_SetVol	
001A: 	JMP	L197A

;Seg 1 = DATA ID# -4001 proc 26 of 46 (local)

0000: L18B6	JSR	locProc30
0004: 	LINK	A6,#$FFC0
0008: 	LEA	$FFC0(A6),A0
000C: 	MOVE.W	$000E(A6),$0016(A0)
0012: 	MOVE.L	$0008(A6),$0012(A0)
0018: 	_FlushVol	
001A: 	JMP	L197A

;Seg 1 = DATA ID# -4001 proc 27 of 46 (local)

0000: L18D4	MOVE.L	$0004(A7),D0
0004: 	MOVE.L	D0,D1
0006: 	MOVEA.L	$034E,A0
000A: 	CMP.W	(A0),D1
000C: 	BCC.S	L18EE
000E: 	MOVEA.L	$14(A0,D1.W),A0
0012: 	MOVE.W	$004E(A0),D1
0016: 	MOVEQ	$00,D0
0018: 	BRA.S	L18F4
001A: L18EE	MOVEQ	$00,D1
001C: 	MOVE.W	#$FFCD,D0
0020: L18F4	MOVEA.L	$0008(A7),A0
0024: 	MOVE.W	D1,(A0)
0026: 	RTS	

;Seg 1 = DATA ID# -4001 proc 28 of 46 (local)

0000: L18FC	JSR	locProc30
0004: 	LINK	A6,#$FFB0
0008: 	LEA	$FFB0(A6),A0
000C: 	MOVE.L	$0008(A6),$0012(A0)
0012: 	MOVE.W	$000E(A6),$0016(A0)
0018: 	CLR.B	$001A(A0)
001C: 	CLR.W	$001C(A0)
0020: 	_GetFileInfo	
0022: 	MOVE.W	D0,-(A7)
0024: 	LEA	$0020(A0),A0
0028: 	MOVEA.L	$0010(A6),A1
002C: 	MOVEQ	$10,D0
002E: 	_BlockMove	
0030: 	LEA	$FFB0(A6),A0
0034: 	MOVE.W	(A7)+,D0
0036: 	JMP	L197A

;Seg 1 = DATA ID# -4001 proc 29 of 46 (local)

0000: L1936	JSR	locProc30
0004: 	LINK	A6,#$FFB0
0008: 	LEA	$FFB0(A6),A0
000C: 	MOVE.L	$0008(A6),$0012(A0)
0012: 	MOVE.W	$000E(A6),$0016(A0)
0018: 	CLR.B	$001A(A0)
001C: 	CLR.W	$001C(A0)
0020: 	_GetFileInfo	
0022: 	LEA	$0020(A0),A1
0026: 	MOVEA.L	$0010(A6),A0
002A: 	MOVEQ	$10,D0
002C: 	_BlockMove	
002E: 	LEA	$FFB0(A6),A0
0032: 	_SetFileInfo	
0034: 	JMP	L197A

;Seg 1 = DATA ID# -4001 proc 30 of 46 (local)

0000: L196E	MOVE.L	$0008(A7),-(A7)
0004: 	JSR	locProc45
0008: 	ADDQ.W	#4,A7
000A: 	RTS	
000C: L197A	.WORD	$3F00,$2F28,$12,$4EBA	;[?./(..N.]
0014: 	.WORD	$16A,$584F,$301F,$48C0	;[.jXO0.H.]
001C: 	.WORD	$4E5E,$4E75	;[N^Nu....]

;Seg 1 = DATA ID# -4001 proc 31 of 46 (local)

0000: L198E	MOVEA.L	$0004(A7),A0
0004: 	MOVE.L	$0008(A7),D0
0008: 	BNE.S	L199E
000A: 	MOVEQ	$01,D0
000C: 	_SPECIAL_HFS	
000E: 	BRA.S	L19A2
0010: L199E	MOVEQ	$01,D0
0012: 	_SPECIAL_HFS	
0014: L19A2	EXT.L	D0
0016: 	RTS	

;Seg 1 = DATA ID# -4001 proc 32 of 46 (local)

0000: L19A6	MOVEA.L	$0004(A7),A0
0004: 	MOVE.L	$0008(A7),D0
0008: 	BNE.S	L19B6
000A: 	MOVEQ	$08,D0
000C: 	_SPECIAL_HFS	
000E: 	BRA.S	L19BA
0010: L19B6	MOVEQ	$08,D0
0012: 	_SPECIAL_HFS	
0014: L19BA	EXT.L	D0
0016: 	RTS	

;Seg 1 = DATA ID# -4001 proc 33 of 46 (local)

0000: L19BE	MOVEA.L	$0004(A7),A0
0004: 	CLR.B	$001A(A0)
0008: 	MOVEA.L	$0004(A7),A0
000C: 	MOVE.L	$0008(A7),D0
0010: 	BNE.S	L19D6
0012: 	MOVEQ	$09,D0
0014: 	_SPECIAL_HFS	
0016: 	BRA.S	L19DA
0018: L19D6	MOVEQ	$09,D0
001A: 	_SPECIAL_HFS	
001C: L19DA	EXT.L	D0
001E: 	RTS	

;Seg 1 = DATA ID# -4001 proc 34 of 46 (local)

0000: L19DE	MOVEA.L	$0004(A7),A0
0004: 	MOVE.L	$0008(A7),D0
0008: 	BNE.S	L19EC
000A: 	_HGetVInfo	
000C: 	BRA.S	L19EE
000E: L19EC	_HGetVInfo	
0010: L19EE	EXT.L	D0
0012: 	RTS	
0014: L19F2	.WORD	$7000,$31C0,$220,$2008	;[p.1..  .]
001C: 	.WORD	$4E75	;[Nu......]

;Seg 1 = DATA ID# -4001 proc 35 of 46 (local)

0000: L19FC	MOVE.L	$0004(A7),D0
0004: 	_NewHandle	
0006: 	JMP	L19F4

;Seg 1 = DATA ID# -4001 proc 36 of 46 (local)

0000: L1A06	MOVEA.L	$0004(A7),A0
0004: 	_GetHandleSize	
0006: 	TST.L	D0
0008: 	BPL.S	L1A16
000A: 	SUBA.W	A0,A0
000C: 	JMP	L19F4
0010: L1A16	MOVEA.L	D0,A0
0012: 	JMP	L19F2

;Seg 1 = DATA ID# -4001 proc 37 of 46 (local)

0000: L1A1C	MOVE.L	$0008(A7),D0
0004: 	MOVEA.L	$0004(A7),A0
0008: 	_SetHandleSize	
000A: 	JMP	L19F4

;Seg 1 = DATA ID# -4001 proc 38 of 46 (local)

0000: L1A2A	MOVEA.L	$0004(A7),A0
0004: 	_RecoverHandle	
0006: 	JMP	L19F2

;Seg 1 = DATA ID# -4001 proc 39 of 46 (local)

0000: L1A34	MOVEA.L	$0004(A7),A0
0004: 	_HLock	
0006: 	JMP	L19F4

;Seg 1 = DATA ID# -4001 proc 40 of 46 (local)

0000: L1A3E	MOVEA.L	$0004(A7),A0
0004: 	_HUnLock	
0006: 	JMP	L19F4

;Seg 1 = DATA ID# -4001 proc 41 of 46 (local)

0000: L1A48	MOVE.L	$000C(A7),D0
0004: 	MOVEA.L	$0008(A7),A1
0008: 	MOVEA.L	$0004(A7),A0
000C: 	_BlockMove	
000E: 	JMP	L19F4

;Seg 1 = DATA ID# -4001 proc 42 of 46 (local)

0000: L1A5A	MOVE.L	D2,-(A7)
0002: 	MOVE.L	$0008(A7),-(A7)
0006: 	JSR	locProc45
000A: 	_CreateResFile	
000C: 	MOVE.L	$0008(A7),-(A7)
0010: 	JSR	locProc46
0014: 	ADDQ.W	#4,A7
0016: 	MOVE.L	(A7)+,D2
0018: 	RTS	

;Seg 1 = DATA ID# -4001 proc 43 of 46 (local)

0000: L1A74	MOVE.L	D2,-(A7)
0002: 	CLR.W	-(A7)
0004: 	MOVE.L	$000A(A7),-(A7)
0008: 	JSR	locProc45
000C: 	_OpenResFile	
000E: 	MOVE.L	$000A(A7),-(A7)
0012: 	JSR	locProc46
0016: 	ADDQ.W	#4,A7
0018: 	MOVE.W	(A7)+,D0
001A: 	EXT.L	D0
001C: 	MOVE.L	(A7)+,D2
001E: 	RTS	

;Seg 1 = DATA ID# -4001 proc 44 of 46 (local)

0000: L1A94	MOVE.L	D2,-(A7)
0002: 	MOVE.L	$0008(A7),-(A7)
0006: 	MOVE.L	$0010(A7),-(A7)
000A: 	MOVE.W	$001A(A7),-(A7)
000E: 	MOVE.L	$001E(A7),-(A7)
0012: 	JSR	locProc45
0016: 	_AddResource	
0018: 	MOVE.L	$0014(A7),-(A7)
001C: 	JSR	locProc46
0020: 	ADDQ.W	#4,A7
0022: 	MOVE.L	(A7)+,D2
0024: 	RTS	

;Seg 1 = DATA ID# -4001 proc 45 of 46 (local)

0000: L1ABA	MOVE.L	$0004(A7),D0
0004: 	BEQ.S	L1AE6
0006: 	MOVEA.L	D0,A0
0008: 	MOVEA.L	A0,A1
000A: 	MOVE.B	(A1)+,D0
000C: 	BEQ.S	L1AE6
000E: L1AC8	MOVE.B	(A1),D1
0010: 	MOVE.B	D0,(A1)+
0012: 	MOVE.B	D1,D0
0014: 	BNE.S	L1AC8
0016: 	SUBA.L	A0,A1
0018: 	MOVE.L	A1,D0
001A: 	SUBQ.W	#1,D0
001C: 	CMPI.L	#$000000FF,D0
0022: 	BLE.S	L1AE4
0024: 	MOVE.L	#$000000FF,D0
002A: L1AE4	MOVE.B	D0,(A0)
002C: L1AE6	MOVE.L	$0004(A7),D0
0030: 	RTS	

;Seg 1 = DATA ID# -4001 proc 46 of 46 (local)

0000: L1AEC	MOVE.L	$0004(A7),D0
0004: 	BEQ.S	L1B04
0006: 	MOVEA.L	D0,A0
0008: 	MOVEQ	$00,D0
000A: 	MOVE.B	(A0),D0
000C: 	BRA.S	L1AFE
000E: L1AFA	MOVE.B	$0001(A0),(A0)+
0012: L1AFE	DBRA	D0,L1AFA
0016: 	CLR.B	(A0)
0018: L1B04	MOVE.L	$0004(A7),D0
001C: 	RTS	
001E: 	.WORD	$C82,0,$FFFF,$6218	;[......b.]
0026: 	.WORD	$3241,$4241,$4841,$82C2	;[2ABAHA..]
002E: 	.WORD	$2001,$4841,$3009,$80C2	;[ .HA0...]
0036: 	.WORD	$3200,$4240,$4840,$4E75	;[2.B@H@Nu]
003E: 	.WORD	$2001,$4240,$4840,$4841	;[ .B@H@HA]
0046: 	.WORD	$4241,$2242,$740F,$D281	;[BA"Bt...]
004E: 	.WORD	$D180,$B3C0,$6204,$9089	;[....b...]
0056: 	.WORD	$5241,$51CA,$FFF2,$4E75	;[RAQ...Nu]
005E: 	.WORD	$2F02,$2401,$2200,$4A82	;[/.$.".J.]
0066: 	.WORD	$6C02,$4482,$7000,$4A81	;[l.D.p.J.]
006E: 	.WORD	$6C04,$4481,$4680,$2040	;[l.D.F. @]
0076: 	.WORD	$4EBA,$FFA6,$3408,$6702	;[N...4.g.]
007E: 	.WORD	$4480,$241F,$4E75,$4E75	;[D.$.NuNu]